home *** CD-ROM | disk | FTP | other *** search
- on exitFrame
- global contentsprite, returnflag, returnframe, whichlist, objectpct, endSprite
- set objectpct to 46
- controlinit()
- initglobals()
- initcursor()
- set returnframe to the frame
- set whichlist to word 1 of the frameLabel
- set returnflag to 1
- end
-
- on controlinit
- initcontrols()
- installcontrol()
- end
-
- on initglobals
- global ghotlist, gactslist
- set ghotlist to []
- set gactslist to []
- end
-